File_Drive


Purpose   Extracts the drive from a fully qualified filename.

Decln.    File_Drive(FullName:string):string;

Returns   String

Remarks   This function is only available to the Turbo 5.0 programmer.

          FullName is the source filename.

          If the filename does not include a drive, a null string '' is
          returned. The colon ':' is removed (sorry Ronnie).

Example

VAR
  F : STRING;
BEGIN
    F := FILE_DRIVE('C:\TURBO5\TTT5\MISCTTT5.PAS');
END;

F is assigned the value "C".